! name: b.ajt04*
! type: ArchiCAD Door File
! ***** 3D script *****

mat1 = c
mat2 = d
tsz = e

addz -0.02
dx=(a-2*(0.13+tsz)-0.05*2)/3

prism_  35, 0.07, 
    -a/2+tsz-0.03, 0.01, 15,
     a/2-tsz+0.03, 0.01, 15,
     a/2-tsz+0.03, b-tsz+0.03, 15,
    -a/2+tsz-0.03, b-tsz+0.03, 15,
    -a/2+tsz-0.03, 0.01, -1,

    -a/2+tsz+0.13, 0.31, 15,
    -a/2+tsz+0.13+dx, 0.31, 15,
    -a/2+tsz+0.13+dx, 0.81, 15,
    -a/2+tsz+0.13, 0.81, 15,
    -a/2+tsz+0.13, 0.31, -1,

    -a/2+tsz+0.13+0.05+dx, 0.31, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.31, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.81, 15,
    -a/2+tsz+0.13+0.05+dx, 0.81, 15,
    -a/2+tsz+0.13+0.05+dx, 0.31, -1,

    -a/2+tsz+0.13+(0.05+dx)*2, 0.31, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.31, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.81, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.81, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.31, -1,

    -a/2+tsz+0.13, 0.96, 15,
    -a/2+tsz+0.13+dx, 0.96, 15,
    -a/2+tsz+0.13+dx, b-tsz-0.13, 15,
    -a/2+tsz+0.13, b-tsz-0.13, 15,
    -a/2+tsz+0.13, 0.96, -1,

    -a/2+tsz+0.13+0.05+dx, 0.96, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.96, 15,
    -a/2+tsz+0.13+0.05+2*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+0.05+dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+0.05+dx, 0.96, -1,

    -a/2+tsz+0.13+(0.05+dx)*2, 0.96, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.96, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.96, -1

addz 0.0125

prism_ 10, 0.04, 
    -a/2+tsz+0.13, 0.31, 15,
    -a/2+tsz+0.13+dx, 0.31, 15,
    -a/2+tsz+0.13+dx, 0.81, 15,
    -a/2+tsz+0.13, 0.81, 15,
    -a/2+tsz+0.13, 0.31, -1,

    -a/2+tsz+0.165, 0.345, 15,
    -a/2+tsz+0.095+dx, 0.345, 15,
    -a/2+tsz+0.095+dx, 0.775, 15,
    -a/2+tsz+0.165, 0.775, 15,
    -a/2+tsz+0.165, 0.345, -1

prism_ 10, 0.04,
    -a/2+tsz+0.13+0.05+dx, 0.31, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.31, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.81, 15,
    -a/2+tsz+0.13+0.05+dx, 0.81, 15,
    -a/2+tsz+0.13+0.05+dx, 0.31, -1,

    -a/2+tsz+0.13+0.085+dx, 0.345, 15,
    -a/2+tsz+0.13+0.015+2*dx, 0.345, 15,
    -a/2+tsz+0.13+0.0155+2*dx, 0.775, 15,
    -a/2+tsz+0.13+0.085+dx, 0.775, 15,
    -a/2+tsz+0.13+0.085+dx, 0.345, -1

prism_ 10, 0.04,
    -a/2+tsz+0.13+(0.05+dx)*2, 0.31, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.31, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.81, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.81, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.31, -1,

    -a/2+tsz+0.165+(0.05+dx)*2, 0.345, 15,
    -a/2+tsz+0.095+2*0.05+3*dx, 0.345, 15,
    -a/2+tsz+0.095+2*0.05+3*dx, 0.775, 15,
    -a/2+tsz+0.165+2*0.05+2*dx, 0.775, 15,
    -a/2+tsz+0.165+2*0.05+2*dx, 0.345, -1

del 1

prism_ 5, 0.07,
    -a/2+tsz+0.165, 0.345, 15,
    -a/2+tsz+0.095+dx, 0.345, 15,
    -a/2+tsz+0.095+dx, 0.775, 15,
    -a/2+tsz+0.165, 0.775, 15,
    -a/2+tsz+0.165, 0.345, -1

prism_ 5, 0.07,
    -a/2+tsz+0.13+0.085+dx, 0.345, 15,
    -a/2+tsz+0.13+0.015+2*dx, 0.345, 15,
    -a/2+tsz+0.13+0.0155+2*dx, 0.775, 15,
    -a/2+tsz+0.13+0.085+dx, 0.775, 15,
    -a/2+tsz+0.13+0.085+dx, 0.345, -1

prism_ 5, 0.07,
    -a/2+tsz+0.165+(0.05+dx)*2, 0.345, 15,
    -a/2+tsz+0.095+2*0.05+3*dx, 0.345, 15,
    -a/2+tsz+0.095+2*0.05+3*dx, 0.775, 15,
    -a/2+tsz+0.165+2*0.05+2*dx, 0.775, 15,
    -a/2+tsz+0.165+2*0.05+2*dx, 0.345, -1

addz 0.07
addx a/2-tsz
addy 0.01
roty -90
rotz 90
 
prism_   5, a-2*tsz, 
      0, 0, 15,
      0.07, 0, 15,
      0.07, -0.005, 15,
      0.05, -0.025, 15,
      0, -0.025, 15

del 5

addz 0.063/2
material mat1 

prism_ 5, 0.007,
    -a/2+tsz+0.13, 0.96, 15,
    -a/2+tsz+0.13+dx, 0.96, 15,
    -a/2+tsz+0.13+dx, b-tsz-0.13, 15,
    -a/2+tsz+0.13, b-tsz-0.13, 15,
    -a/2+tsz+0.13, 0.96, -1

prism_ 5, 0.007,
    -a/2+tsz+0.13+0.05+dx, 0.96, 15,
    -a/2+tsz+0.13+0.05+2*dx, 0.96, 15,
    -a/2+tsz+0.13+0.05+2*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+0.05+dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+0.05+dx, 0.96, -1

prism_ 5, 0.007,
    -a/2+tsz+0.13+(0.05+dx)*2, 0.96, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, 0.96, 15,
    -a/2+tsz+0.13+2*0.05+3*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, b-0.13-tsz, 15,
    -a/2+tsz+0.13+2*0.05+2*dx, 0.96, -1

del 1


addy 1.015
addx -a/2+tsz+0.13/2
addz 0.07

call "handle_3" mat2

addz -0.07
mulz -1

call "handle_4" mat2
